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PERFECT COPY The most sophisticated 4 eg say fos 
robots can be created from simulation 801 market, starting with those 


programs. We create a very simple program 
of our own to demonstrate the principles of 


robot simulation publish the final part of the 
debugger project. 

@ The final touch: we 
examine the Touchmaster 
graphics tablet, which can be 
interfaced to a wide range of 





DRESSED TO QL We review the 


Spectrum+, the new machine from Sinclair, 806 home micros. 
which answers the keyboard criticisms of the 
old machine but leaves a few problems 
unsolyed 








a p 1) Apart from the keyboard, what other new feature 
= has been added to the Spectrum+, and where is it? 





PROBLEM SOLVER TK! Solver for the 


2) What kind of motor are we using to build the 
more expensive micros is the most advanced 804 robot and why is this type more suitable for the 
spreadsheet we have looked at so far purpose? 

3) What kind of addressing would we expect to use 
STARS ON SCREEN Starfinder is a E access an array in the computer's memory? 
remarkable astronomy program for the BBC 820 4) What is the difference between an equation 
Micro and Electron processor and a spreadsheet? 


Answers To Last Week’s Quiz 





ee n. een 1) If the software written for one model of computer in a a 
ENDGAME Our Loco adventure game is | manufacturer's range will work on all succeeding models in the 
: : range, itis said to be ‘upward compatible’. 
HOW complete as the mapi cal DEMIS SEGS JOU 808 2) ‘Daisy chaining’ means sharing a data bus or power supply 
safely to the end of the quest among several devices by connecting the output of one device to 


the input of the next, and so on around the chain. 
3) In Lotus 1-2-3 commonly-used sequences of keystrokes can 
be saved and named as a sub-program; this is called a ‘keyboard — 





quo macro”. 
INDEX TO INFORMATION 4) INVENTORY is a command used in most adventure games to 
MANAGEMENT SYSTEM A weekly 816 display the list of your possessions. 
glossary of computing terms | 
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ON LOCATION We continue to develop an 
adventure game in BASIC 81 3 
















LAST ORDERS Our machine code 

debugger program is almost complete. In this 37 / 
instalment we look at an interrupt 

mechanism that transfers control from the 

main program to the debugger program 
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COVER PHOTOGRAPHY BY IAN McKINNELL 


IN THE BEGINNING We begin new 
projects for the Commodore 64 and BBC 8] 0) 
Micro in which we build a floor robot 




















INSIDE 
REFERENCE CARD We publish the final BACK 


part of the Z80 programmers’ reference card COVER 











STEVE CROSS 


ROBOTICS/APPLICATION 


PERFECT COPY 


We've spent some time in this series 
considering the different methods that may 
be used to allow robots to act ‘intelligently’. 
However, the typical computer user is 
unlikely to have access to a robot and 
therefore cannot put these ideas into action. 
The simple answer is to simulate a robot’s 
behaviour by using a computer. 


The development of computer technology has led 
to an increasing use of simulations: computer 
‘models’ may be constructed that will faithfully 
mimic events in the ‘real’ world. Most people are 
familiar with the idea of flight simulators — 
extremely complex devices that enable trainees to 
gain flying experience without having to pilot a 
real aircraft. But many other activities can benefit 
from computer simulation — business forecasting, 
engineering operations and physical processes of 
all types can very easily be simulated on a 
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computer model. In some cases, the computer 
model can carry out experiments that would be 
too dangerous to attempt by any other means. It 
might be vitally important to discover what 
happens in a nuclear power station when coolant 
leaks from the reactor. In this instance, it would 
obviously be impossible to use a real power station 
for the experiment, so a computer simulation is 
used. If the model is sufficiently detailed, it is then 
possible to see exactly what would happen if the 
leak occurred. 

Similarly, in robotics, computer simulations are 
used to design new robots. It is obviously possible 
to proceed by trial and error — building a robot, 
watching how it behaves, and then making any 
necessary modifications — but this is time- 
consuming and expensive. A computer simulation 
allows you to design your robot and monitor its 
actions without spending money and without the 
physical labour involved in making frequent 
design changes. 








Moving Together 

When robot arms are engaged in 
a common task there is a real 
need for choreography in order 
that they do not interfere with 
one another. Here, one'arm 
must pick up and hold the toy in 
position while the other picks up 
and fixes a drum; the first arm 
then places the completed toy in 
its packing box. If the movement 
of the arms is properly managed 
then conveyor belts can be 
placed in any arrangement that 
suits the rest of the assembly, 
whereas a human operator’s 
ergonomic requirements would 
limit this freedom 
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b APPLICATIONS’ ROBOTICS 





Chorus Line 

The complexity of movement 
and synchronisation required in 
real robotics applications can be 
clearly seen in this section of the 
Ford Sierra assembly line 






COURTESY OF FORD 


Take as an example a car assembly line, on 
which a team of robots works on the cars as they 
pass by. All you want to dois to program the robots 
so that they will assemble the cars in the correct 
manner. However, programming the robots takes 
time, and money is lost each time the production 
line is halted. You might decide to set up a dummy 
assembly line with some brand new robots with 
which to develop the new programs. But this, too, 
is expensive and can easily lead to another snag — 
the problem of robot choreography, which we 
considered earlier in this series. It is vital to ensure 
that robots working together do not interfere with 
each other’s movements. This is not just a matter 
of convenience — a large industrial robot capable 
of moving heavy loads could easily damage 
another robot if it should run into it. And it’s not 
only the robots that may be damaged — an 
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improperly programmed robot that spends its 
time welding car doors shut would soon prove a 
problem! 

The obvious answer is to carry out computer 
simulations of each robot's actions so that the user 
can see how they will interact. This way the cost is 
low and nothing is damaged. Once the simulation 
is complete and everything looks satisfactory, the 
programs that have been developed can easily be 
transferred to the real robots, which can then be 
safely left to carry out their designated tasks. 

In this article, we will demonstrate the principle 
of robot simulation with a program, Robot Arm, 
that simulates a ‘pick and place’ robot arm with 
two degrees of freedom. It has no sensors, so you 
must guide it yourself, controlling the shoulder 
and elbow joints and the grab mechanism in the 
end effector, in order to pick up an object and then 
place it somewhere else. Additionally, you should 
refer back to the maze-solving program detailed 
on page 722, which demonstrates how a robot 
may be progammed to find its way to the centre of 
a maze. This program is, in effect, a computer 
simulation of how a ‘real’ robot would attempt to 
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reach its goal. It mimics the actions of a robot fitted 
with a simple touch sensor, and it finds the correct 
path by simply advancing into empty spaces until 
it meets a dead end, whereupon it returns to the 
last junction it encountered and then tries a new 
route. This is hardly a sophisticated model, but it 
does show how a computer program can be used 
to simulate a robot’s movements. The ‘robot’ in the 
program obeys a fixed set of rules and ‘maps out’ 
the environment. If, within the program, the robot 
had direct and immediate access to the positions of 
all the maze components, it would be able to move 
directly to its goal. In our program, it does not have 
this information and so must use a trial and error 
technique. 

Similarly, the Robot Arm program mimics the 
behaviour of a robot that has no sensors at all. This 
program contains a model of the robots 
environment and a model of the arm itself, and 
you must ensure that these two models will 
interact only as they would in real life. So you 
cannot pick up an object with the arm unless the 
arm is positioned correctly. And you cannot move 
the arm below floor level, as that would be 
impossible if the robot arm was real. Although we 
are using computer graphics, in which one line 
(representing the arm) may easily cross another 
line (the floor), for an accurate simulation it is 
essential that these lines do not cross. And when 
the robot drops an object, that object must not 
remain in its current position — your simulation 
must allow gravitational effects. If this is ignored, 
you would certainly not be able to develop a safe 
simulation of a pick and place robot for handling 


eggs! 
ADDING REALISM 


There are very few limitations on what can be 
achieved using computer simulation — and, in 
most cases, the more complex the simulation is the 
more fascinating it becomes. Such a simulation 
can be even more entertaining than simply playing 
with ‘real’ robots, for the simple reason that, using 
a simulation, you can design any robot you like; 
programming the correct details of the robot and 
its world can lead to a better understanding of 
robots and of the way in which the physical world 
works. Look again at the Robot Arm program. 
You will see that when the robot drops an object it 
falls to the ground and stays there. To make the 
model even more realistic, the program could be 
altered so that the object accelerates as it falls, thus 
obeying the law of gravity. And perhaps, on hitting 
the ground, it should bounce? The possibilities are 
many, and the program is there for you to adapt, 
adding new and more realistic features to make 
your simulation as lifelike as possible. 

Designing computer simulations can be very 
similar to developing computer games software. 
The big difference is that a simulation must 
represent the real world as accurately as possible. 
Achieving this accuracy may be difficult but, once 
achieved, the simulation can be considerably more 
satisfying than merely playing a computer game. 


4 REM *##***#* SPECTRUM HH HH xxx% x% 
3 REM * ROBOT ARM SIMULATION# 
& REM *¥*#**SPECTRUMH# XX xxx% x% 


16 CLS : PRINT "ROBOT ARM": PRINT PRINT "THE 
CONTROLS FOR THE ROBOT ARM ARE: " 
15 PRINT "S- SELECT SHOULDER ROTATION": PRINT 


"E- SELECT ELBOW ROTATION": 
T CLOCKWISE" 

2@ PRINT "H-ROTATE JOINT ANTICLOCKWISE": 

"U-GRAB BALL": PRINT "F-DROP BALL" 

25 PRINT AT 208,11; FLASH 1;"hit a key": PAUSE 
@: RANDOMIZE 
1000 GO SUB 9566: 
1100 GO SUB 5000: 
1200 GO SUB 4000: 
1408 STOP 
1500 REM 
1556 LET 
1560 LET 


PRINT "K-ROTATE JOIN 


PRINT 


REM init 
REM input 
REM crash 


*update jointxy XXX 

ex=11*SIN hdi: LET ey=11x*C0S hdi 

hx=sxtex: LET hy=sytey 

1650 LET wx=12*SIN hd2: LET wy=12*COS hd2 

- 1660 LET hx=hx+wx: LET hy=hy+wy 

154208 RETURN 
2000 REM * 
2020 INK acol 
2050 PLOT INVERSE rubout;sx,sy 

2100 DRAW INVERSE rubout;ex,ey: DRAW INVERSE r 
uboutjwx,wy: IF blup THEN LET br=FN r(¢hy): LET 
bc=FN cíhx>: GO SUB 2508 

2496 RETURN 

2500 REM * draw ball 
2608 INK bcol 

2650 PRINT AT br,bc;"M "<rubout+1> 

2740 RETURN 

2750 REM * drop ball AHHH LL X% 

2800 LET rubout=1: GO SUB 2000: LET rubout=8 
2820 LET K=INT C(xh*RND>:¿ IF k>=xs THEN IF k<=xs 
+wd THEN GO TO 2828 
2850 LET br=FN r¢(y@+4): 

=0: GO SUB 2000: 

2998 RETURN 

3000 REM x rotate KKK KKKKKKKKKHE 

3100 LET rubout=1: GO SUB 2008 

3120 LET ti=dirn*sr*¥al: LET t2=titdirn*er*a2 
3150 LET hdi=hdit+tti: LET hd2=hd2+t2 

3200 GO SUB 1588 

3300 IF ABS hdi>p2 THEN LET ok=8 

3320 LET pt=POINT (hx,hy)> 

3340 IF pt<>0 THEN LET ok=@: 
bc=FN cíhx> THEN LET ok=2 

3400 LET rubout=@: GO SUB 2000 
3450 INK bacol: PRINT AT 21,0;s$;AT 21,2;FN d¢hd 
1>¡AT 21,26;FN d(hd2> 


draw arm FAR KK KK KARA 


HALA RA 


LET bc=FN clk): 
GO SUB 2588 


LET blup 


IF br=FN r¢hy? AND 


34908 RETURN 

5000 REM * input KEK KKK KKK KKK KHER 

5100 IF INKEY$<>"" THEN GO TO 5100 

5120 FOR 1=8 TO 1 STEP @ 

5150 LET as=INKEYS$: IF a$>="A" AND a$<="2" THEN 
LET at=CHR® (CODE a$+32) 

5200 IF a$="s" THEN LET sr=1: LET er=@ 

5220 IF at="e" THEN LET er=1: LET sr=@ 

5250 IF a$="k" THEN LET dirn=1: GO SUB 3008 
5270 IF a$="h" THEN LET dirn=-1: GO SUB 3000 

5300 IF a$="u" THEN IF ok=2 THEN LET blup=1 
5320 IF at="f" THEN IF blup THEN GO SUB 2758 

5400 IF NOT ok THEN LET 1=2 

5450 NEXT 1 

5498 RETURN 

68600 REM * crash KARA ELE EA RR 

6186 PRINT AT 8,12; FLASH 13"''crash!''": BEEP .S 
23) BEEP 1,=16:3 RETURN 

9000 REM * draw base EHH 

799508 PAPER pacol: CLS 

9108 INK grcol 

9120 FOR k=@ TO y@: PLOT @,k: DRAW xh,@: NEXT K 

9200 INK bacol: LET xs=(xh-wd)/2 

9220 FOR k=y@+1 TO yB+ht 

9246 PLOT xs,k: DRAW wd,8 

9268 NEXT k 

9386 INK bcol: GO SUB 2588: INK acol 

9408 PRINT AT 206,1;"SHOULDER" ¡AT 26,26;"ELBOW" 

9490 RETURN 

9500 REM * init HHKKKKKKKKKKKKKKHKE 

29550 DEF FN d¢x.=INT (xx*180/PI> 

9560 DEF FN r¢(x)=21-INT ¢(x/8) 

9570 DEF FN cíx>=INT (x/8) 

9600 DIM s#¢32): LET x1l=@: LET yl=@: LET xh=254: 
LET yh=174 

9628 LET y@=23: LET wd=6@: LET ht=23 

2530 LET blup=@: LET bc=2: LET br=FN r¢(y@+4) 
9640 LET grcol=3: LET bacol=2: LET acol=1: LET b 

col=4: LET pacol=7 

9658 LET sx=xh/2: LET sy=yB8+ht+2: LET li=(yh-ht- 

y@-2)/2: IF 11>xh/94 THEN LET 11=xh/4 

96608 LET 12=11: LET hx=@: LET hy=8 

9676 LET p2=PFPI/2: LET al=PI/32: LET a2=2*al 

968@ LET hdi=@: LET hd2=p2 

95908 LET sr=1: LET er=B: LET dirn=1: LET rubout= 
@: LET ok=1 


9758 GO SUB 9000: 
9798 RETURN 


GO SUB 1588: GO SUB 2688 
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Pick And Place 


This program simulates a robot arm that is able to 
reach about, pick objects up and place them down in 
another location. Your task is simply to pick up the 
ball and then drop it. The arm is designed to use co- — 
ordinates of revolution with two degrees of freedom: 
a shoulder joint and an elbow joint. The shoulder 
joint can rotate through 180° and the elbow joint 
through 360°. 

The program is controlled using the following 
keys: S indicates that you want a shoulder 
movement; E indicates that you want an elbow 
movement; the K and H keys indicate whether you 
wish the joint of the arm to be rotated clockwise or 
anticlockwise. Each press rotates the shoulder joint 
through 6”, or the elbow through 12”. U indicates 
that you want the arm to attempt to pick up the ball. 

is will only be successful if you have managed to 
manipulate the arm within reach of the ball. F 
indicates that you want the robot to drop the ball 





On the BBC Micro make the following additions and 


changes: 
4 REM XHHHHHHEXXX BBC HERR ARA RRA 
5S REMx ROBOT ARM SIMULATION + 


6 REMEX HHH HHHHREXBBC ERA RAR 
7 MODE 1:COLOUR 130:COLOUR 1:;CLS 


25 PRINTTABC(15,20>"HIT A KEY" :AS=GETS 
1000 GOSUB 7606 
2626 GCOL @,acol 
2050 MOVE sx,sy 
2100 PLOT rubout,ex,ey:PLOT rubout,wx,wy:lF 


blu p THEN br=hy:bc=hx:GOSUB 2588 

2190 RETURN 

2200 REM*¥*¥*¥*****GRAB THE BALL 3 3 335253525 

2250 blup=1:rubout=3:GOSUB 2500 

2300 rubout=1:GOSUB 2000 

2688 GCOL @,bcol:MOVE bc,br 

2650 PLOT @,8,bsz:PLOT 8@+rubout,bsz,@ 

2700 PLOT @,8,-bsz:PLOT 8@+rubout,-bsz,@ 

2800 rubout=3:GOSUB 208@:rubout=1 

2820 kK=INTC<xh*RNDC(1)):1F k>=xs THEN IF k<=xs+wd 
THEN GOTO 2828 i 
2850 br=y0+5:bc=k:blup=08:GOSUB 268@:GOSUB 2500 
3100 rubout=3:GOSUB 2000 

3340 IF pt<>pacol-128 THEN ok=0:IF pt=bcol 
ok=2 

3400 rubout=1:GOSUB 2000 

3458 COLOUR bacol :PRINTTAB(8@,3)s%;TABC4,3) ;FNd 
< hdi) ;TABC 27,3) ;FNd¢hd2> 

5109 IF INKEY$(8><>"" THEN GOTO 5100 


5150 at=INKEY$(@):IF a$>="A"ANDa$<="2Z"THENa$=CH 


R$(ASC(a$)+32) 
5300 IF a$="u" AND ok=2 THEN GOSUB 2200 
5400 IF ok=0 THEN 1=2 


$189 PRINTTAB(12,3>"!!CRASH!!":SOUND 1,-15,48,1/ 


@:SOUND 1,-15,4,280: RETURN 

9958 GCOL B,pacol :COLOUR paco! :CLS 

9188 GCOL B,grcol 

9126 FOR k=0 TO yB:MOVE @,k:DRAW xh,K:NEXT k 
9289 GCOL @,bacol:xs=(xh-wd)/2 

9240 MOVE xs,k:DRAW xstwd,k 

9300 MOVE bc,br:GOSUB 2580 :COLOUR acol 

9400 PRINTTAB(1 ,2> "SHOULDER" ; TAB‘ 26,2) "ELBOW" 
9600 s$="":x1=0:y1=B8:xh=1900:yh=1000 

9620 y@=108:wd=288:ht=188 

9638 blup=8:bsz=wd/S5S:bc=40:br=yB8+5 

9648 grcol=3:bacol=2:acol=2:bcol=B:pacol=129 
96508 sx=xh/2isy=yOtht+2:1l1=Cyh-ht-y@-2)/2:I1F 11 
>xh74 THEN 11=xh/4 

9698 sr=1:er=B:dirn=1:rubout=1 :ok=1 


THEN 





Straight From The Shoulder 

Our robot arm simulation 
program allows you to move a 
two-joint arm in two dimensions 
and pick up an object with it. 
When the object is dropped the 
program places it randomly on 
the floor. The display shows the 
vertical angles made by the 
upper and lower arms 
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LIZ DIXON 





GLOBAL SHEET 
7 RULE SHEET 
EEE ETT 
mpm 


LIST SHEET 


USER FUNCTION C 


SHEET 


= PLOTSHEET 


> TABLE SHEET 





PROBLEM SOLVER 





Our spreadsheet series continues with a 
close look at TK!Solver, a modelling 
program from the creators of VisiCalc that 
takes the spreadsheet concept into a new 
direction: equation processing. 








seen in this series, microcomputer 
spreadsheet programs can be very useful for a 
variety of mathematical tasks. For the person 
accustomed to working on large row and column 
worksheets with a pencil and a calculator, the 
electronic spreadsheet is an invaluable time and 
energy saver. Nevertheless, spreadsheets do have 
significant limitations. The row and column 
format that is ideal for accounting or other 
financial models is often cumbersome, and at 
times useless, for higher level mathematical and 
scientific applications. And spreadsheets have a 
very rigid structure for handling equations. 
Software Arts, the American company that 
created VisiCalc, has developed a program called 
TK!Solver that goes beyond spreadsheets in both 
form and function. ‘TK! stands for ToolKit, while 
‘Solver’ is the section of code that actually 
processes equations. Besides differing from 


` spreadsheets in screeen format, TK! offers the 


Model Of Interaction 


This diagram shows the 
structure of the worksheets 
available within TK!Solver and 
their relationship to each 

_ other. Subsheets contain data 
that is called upon from the 
controlling sheet 


‘Way. VARIABLE SUBSHEET 


LIST SUBSHEET 


USER FUNCTION 
SUBSHEET 
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following unique features: 

Backsolving — Spreadsheet formulae can solve 
for a single variable only. TK! can solve for any 
variable in an equation, ifitis given enough data to 
do so; 

Iteration— If a value required to solve an equation 
is missing or unknown, you can input a guess that 
TK! uses as a starting point. It then solves the 
equation through a series of successive 
approximations; 

Unit conversion — TK! can convert values from 
feet to metres, dollars to pounds, etc., instantly 
from conversion tables; . 

Mathematical functions — TK! has a large 
number of these built in. l 


TKISOLVER WORKSHEETS 


The TK!Solver program operates through three 
linked worksheets, each with a specific function. 
The Variable sheet contains the names of all 
defined variables; columns for the user’s input 
values and the program’s output values; a place to 
indicate associated units, and space for the user to 
annotate each variable with a comment. The 
Variable sheet appears at the top of the program’s 
initial display screen. Each variable is also 
described in detail on a separate variable subsheet. 
The Rule sheet is used to enter the equations TK! 
is expected to solve. An equation can be up to 200 
characters long, and must conform to standard 
mathematical conventions of notation and 
operations. The Rule sheet fills the bottom portion 
of TK!’s opening screen. The Unit sheet stores the 
information needed to convert the units of 
measurement attached to the variables in a model. 

TK!Solver uses these three sheets to perform 
most of its operations. Other sheets include a 
Global sheet, in which the user can customise 
some of TK!’s operating procedures; a List sheet 
that stores an array of values for variables; the 
User Function sheet, for user-defined functions; 
and sheets for plotting and printing points or 
tables of values. 


CREATING A MODEL 


We will begin by creating a very simple model 
adapted from the TK!Solver owner's manual that 
calculates mileage and average speed for an 
automobile journey, and converts the values from 
imperial to metric units. In TK!’s opening display, 
we find the cursor in the Rule sheet at the bottom 
of the screen. We begin by defining the variables in 
appropriate equations, so we type: 


distance/time=speed 
and press Return. Initially, TK! is set to read 


variable names from equations directly onto the 
Variable sheet above. TK! evaluates the equation 
and prints the variables in the Name column on 
the Variable sheet in the same order as they appear 
in the equation. Then an asterisk is displayed in 
the Status column next to the equation. The 
asterisk means that the equation is unsatisfied, 
because no values have been input on the variable 
Sheet. We then enter the second equation in the 
same way: 


distance/fuel=mileage 


When this equation has been entered, all five of 
the variables defined will be listed in the Name 
column on the Variable sheet as shown below. 


pa 


ma ti 
x 





Press the semi-colon (;) key to move the cursor 
from the Rule sheet to the Variable sheet, into 
which we can now enter values. The cursor 
appears in the input column next to our first 
variable, distance. The following values are 
entered by typing them in the appropriate space, 
then pressing Return or the down arrow key. 


INPUT NAME OUTPUT 
500 distance 
8.5 time 
speed 
14 fuel 
mileage 


The speed and mileage values are left blank for TK! 
to solve. Their calculated values will be displayed 
in the OUTPUT column. To solve for speed and 
mileage, press the exclamation mark (!), which TK! 
calls the ‘action’ key. TK! will display the phrase 
Direct Solver above the Variable sheet because the 
program has been given all the data required to 
find a direct solution. Shortly, the values for speed 
and mileage will be displayed as output. We can 
delete the values previously input and obtain a 
figure for distance by giving TK! new values for 
speed and time, or for mileage and fuel. 


UNIT CONVERSION 

The values entered in our model so far have no 
units attached. We cannot simply type miles, or 
gallons, in the unit column on the Variable sheet, 





TKISOLVER/SOFTWARE < 


because units may not be used until they have been 
defined. We move the cursor into the Rule sheet 
by pressing the semi-colon (;) key and then typing 
=U, TK! replaces the Rule sheet in the bottom 
window with the Unit sheet. 

The Unit sheet has four columns: 


Add Offset 


The cursor is displayed below the word From. We 
can then enter the units we want TK! to know and 
the conversion values as shown below. 


From To Multiply by 


a 


ee 2% 53 el 
yaa ne i 
panee EAN pj = 

nel > A to ty 


Press =R to restore the Rule sheet, then ; to move 
into the Variable sheet. We can now enter the 
defined names into the Unit column — m for 
distance; h for time; m/h for speed; g for fuel, and m/g 
for mileage. Blank all the current values and 
replace them with these: 1,247 for distance; 22.5 
for time; and 43.9 for mileage. Press ! to solve, and 
the metric values are displayed. 


onversion 





qo metric © 


Now place the cursor over m in the unit column 
and type km for kilometres. Press Return, and TK! 
will automatically convert the value of 1,247 for 
distance from miles to kilometres, so the value of 
distance changes to 2006.423. 

We have used only a few of the facilities offered 
by TK!Solver in this simple model. In the next 
instalment, we will look at a more sophisticated 
model, using TK!’s function and plotting abilities. 
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Six 0f One 

Following the current fashion for 
‘bundling’ software with home 
micros, Sinclair includes an 
impressive software six-pack 
with the Spectrum+ (and the 
Spectrum 48K). It comprises a 
word processor, spreadsheet, 
two games, and two graphics 
packages — at least £30 worth 
of good-quality software 










` HARDWARE/SPECTRUM+ 


DRESSED TO QL 


The Sinclair Spectrum has proved to be the 
most successful home computer ever in the 
UK. However, the machine has begun to 
appear a little outdated and unimaginative 
next to stylish rivals like the Amstrad CPC 
464 and Commodore Plus/4, and Sinclair 
has responded by dressing the old machine 
up in new clothes. 


At its launch in the spring of 1982, the Sinclair 
Spectrum offered outstanding value for money. Its 
only real rivals were the Vic-20, with a meagre 3.5 
Kbytes of user memory, and the Texas TI99 4A, 
which sold at twice the price. At £175, the 
Spectrum was an instant hit with first-time buyers 
as well as being the natural choice of the thousands 
of micro enthusiasts who had outgrown their 
ZX80s and ZX81s. The new machine had an 
astounding 48 Kbytes of memory, used a good 
BASIC, and offered eight colours for graphics, as 
well as a primitive sound facility. The keyboard, 
too, was a vast improvement on the ‘touch- 
sensitive’ flat plastic sheet of the ZX81. Initially 
available by mail order only, the Spectrum was an 
instant success, and rapidly became the country’s 
best-selling micro. 

In the two and a half years since the Spectrum’s 
launch, Sinclair’s competitors produced a range of 
machines to challenge the Spectrum’s market 
dominance. Despite having a decidedly inferior 
BASIC, the Commodore 64 was the most successful 
challenger; it offered more memory (although 
machine code was needed to make the most of 
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this), superb sound and a ‘real’ keyboard with 
typewriter-style moving keys. The BBC Micro, 
too, offered superior specifications, but its £400 
price prevented it from being a serious threat, and 
its manufacturers chose not to lower its price. 
However, a succession of Commodore price cuts 
reduced the cost of the 64 from an initial £340 to 
£150; Sinclair reacted by dropping the Spectrum 
to £130. 

By this time, the Spectrum keyboard — once 
such an attraction — was now a decided drawback. 
The machine’s software base was unsurpassed, 
and many ‘serious’ packages were produced for it. 
However, trying to use word processing programs 
with the Spectrum keyboard was like typing with 
mittens on. Many users, therefore, invested in 
‘proper’ keyboards, and this trend accelerated 
when the long-awaited Interface 1/Microdrive 
unit finally appeared. It soon became apparent 
that the micro users of 1984 were no longer 
prepared to accept the Sinclair idea of what 
constituted an acceptable input device. 


SPECTRUM FACELIFT 


Sinclair Research’s response has been to give 
the Spectrum a facelift. The Spectrum+ is 
essentially the same machine, but housed in a cut- 
down QL keyboard, with a few extra keys, a Reset 
switch and a couple of retractable legs. All of the 
peripherals produced for the older version should 
work with the ‘Plus’, but Sinclair has failed to take 
the opportunity to bring the Spectrum’s 
performance more in line with the competition by 
improving the sound, or providing a monitor 
socket or a built-in Interface 1. The sound 
capabilities of the machine are now its greatest 
handicap. The two legs do allow a little more 
volume to escape from the machine’s base but this 
is more an annoyance than a convenience as it 
means that the LOADing and SAVEing noises are 
also magnified. The Spectrum’s pathetic BEEPing 
is still woefully inadequate. 

The Spectrum+ measures 319 by 149 by 38 mm 
(127, by 5% by 1’4in). The new design makes 
programming easier by providing extra keys for 
“Extended” and graphics mode, true and inverse 
video, Delete and Break keys, and separate keys 
for commonly used punctuation symbols like the 
semi-colon, quotes, comma and full stop. An 
extra Symbol Shift key has also been added, and 
the cursor keys are now allocated new places 
alongside a small Space bar. All the old key 
combinations still work. For veteran Sinclair users 
the new design may cause a few problems. In 
particular, the new Edit key is situated next to the 
A’ key; if this is hit by mistake when a long 
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program line is being entered, the line will be lost. 

As part of the repackaging, Spectrum+ 
purchasers receive a ‘six-pack’ of programs — 
Psion Chess, Make-a-Chip, Scrabble, Chequered 
Flag, Vu-3D and the excellent Tasword Two word 
processing software. All of these programs are of a 
very high standard. Unfortunately, the same 
cannot be said for the new Spectrum 
documentation, which, although beautifully 
presented, lacks the depth of the old Spectrum 
manual. The publishers do suggest, however, that 
as users become more proficient with the machine, 
they can send away for more comprehensive 
manuals, costing £7 each. 

For games playing, the new version is certainly 
better than the original, but then most keen 
players will have invested in a joystick and 
interface. Both the Kempston and Fuller 
interfaces work with the Spectrum+, although, as 
on the older machine, the use of the Fuller 
Soundbox may stop some software from running. 
The Kempston Centronics interface performs 
perfectly, as well, as does the Wafadrive mass 
storage system. 

The Spectrum+ is certainly an improvement on 
the original Spectrum, but Sinclair’s idea of what 
constitutes a reasonable keyboard is not going to 
meet with universal approval. Although it might 
be considered a clever move on Sinclair’s part to 
utilise QL technology in a bid to make the 
Spectrum more attractive to buyers, with a £50 
price increase the new keyboard should be 
compared with the already available add-ons. 
Using such a criterion it cannot be considered 
good value for money. The new machine certainly 








SPECTRUM+ 


£180 including six 
demonstration cassettes 


wa 


319 x149x 38mm 


| MEMORY AND INTERFACES 


Same as Spectrum 48K, 
BASIC resident, full software 


Split The a 


Difference 58 sculpted keys (including 
true space bar); membrane 

Inside the attractive QL-type keyboard (see page 503) 

case of the Spectrum+ we find 

the Issue 4.5 circuit board. Coloured illustrated tutorial 


This is essentially the same as manual with user guide 
the Spectrum 48K Issue 3 cassette 


board released in August 83, SIREMGTNS o 
with the addition of the edn MACIAS 
unsightly reset button flying The wealth of existing 


leads patched onto the board Spectrum software, user 
groups and specialist 


publications are enviable 
attractions 


Despite the new keys and the 
legs, the keyboard 's ‘feel’ and 
action are still a major 
weakness 





looks more stylish, but the keys, despite being 
‘sculpted’ to make keying easier, are unresponsive 
and too crowded. 

For first-time buyers, the Spectrum+ is 
certainly worth considering, but the facilities 
offered may not be considered worth the extra 
£50. The cynical might say that Sinclair has 
introduced the Spectrum+ purely as a way of 
increasing prices — it would hardly be surprising if 
the original model was soon phased out. In fact, 
the introduction of this model is a strangely half- 
hearted gesture by Sinclair; it would surely have 
made more sense to have cut the price of the older 
version (and of the Interface 1/Microdrive 
package) and left it alone. On the other hand, 
Sinclair could have increased the price slightly 
more and included all the things the Spectrum 
really needs, such as proper sound facilities, a 
moving-key keyboard, monitor socket, and 
perhaps a built-in Microdrive. But then it would 
never have been ready in time for Christmas . . . 


Key Features 


a EJ Whether you think the 
AN d Spectrum+'s QL-like keyboard 
an improvement or not 
AW, DAG? | depends very much on your 
RESTR D i typing style; the provision of 


SF “2 j separate keys for the more 
ES I cE important functions, however, 


Kiger is areal benefit. The original 

FCAPS SHIFT fi: A OS Spectrum key sequences (e.g. 
j CEA [SYM SHIFT]+[0] for the 

NA semi-colon) duplicate the new 


keys effects - 
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ENDGAME 





Our project to design an adventure game 
using LOGO has reached its final stage. 
Having defined the various locations used in 
the game, and written procedures to move 
between them, we conclude by developing 
routines to deal with the necessary detail of 
the adventure story. 





Our Shrine of Zoltoth game has only two ‘perils’ 
incorporated in it. In ROOM.4, the player is faced 
with a large unfriendly snake, and the program 
branches to a special ‘peril’ procedure: 


TO SNAKE.ATTACKS 
PRINTL [[THERE IS A HUGE SNAKE] [SLOWLY 
MOVING TOWARDS YOU!]] 

END 


The other ‘peril’ does not place the player in any 
immediate physical danger, but certainly could 
cause long-term problems: 


TO GATE 
PRINTL [[A GREAT GOLDEN GATE CLOSES 
BEHIND YOU] [CUTTING OFF THE SOUTHERN 
EXIT]] 
MAKE “PERILS [] 
MAKE “EXIT.LIST [[N 7] (E 8]] 

END 


Other considerations need to be taken into 
account at certain places in the program. The GET 
procedure must be altered so that you cannot pick 
up the ring if you are carrying the sword. 


TO GETIT :ITEM 
IF :ITEM = “RING THEN GET.RING STOP 
ADD.TO.INV :ITEM 
REMOVE.FROM.ROOM :ITEM 

END 


TO GET.RING 
IF MEMBER? “SWORD :INVENTORY THEN 
PRINT [YOU ARE UNABLE TO LIFT 
THE RING] STOP 
ADD.TO.INV :ITEM 
REMOVE.FROM.ROOM :ITEM 
END 


This is the only restriction on the player picking up 
an object. The following routines allow you to 
examine whatever it is you are holding. 


The alpe 
does 


TO RING. DESC 
IF HERE? “RING THEN PRINTL [[ON THE RING 
IS A FADED INSCRIPTION:] [R—— —E]] ELSE 
PRINT [I SEE NO RING] 

END 


TO HERE? :0BJ 
IF MEMBER? :OBJ :CONTENTS THEN OUTPUT 
“TRUE IF MEMBER? :0BJ : INVENTORY THEN 
OUTPUT “TRUE 
OUTPUT “FALSE 

END 


TO CHEST.DESC 
PRINTL [[IT IS BEAUTIFULLY MADE] [AND 
CLEARLY WORTH:A:SM AlekeFORT UNE] [A TINY 
SKULL IS GARVED] [IN ONE ( ROFTHE 
END 


TO SWORD.DESC o 
IF HERE? “SWORD THEN PRINT [IT IS MADE OF 
STEEL] ELSE P E NOSWORD] 

END E 
















TO EXAMINE :OBJ 









The procedure ] Al 
players who believe in re 
anything other than 











IF :OBJ = “RING THEN RING.DESC STOP 

IF :OBJ = “CHEST THEN CHEST.DESC STOP 

IF :OBJ = “SWORD THEN SWORD.DESC STOP 
PRINT [YOU SEE NOTHING SPECIAL] 


TA 
computer reminds you that you a 


TO DEAD 


END PRINT [YOU ARE DEAD! ] 
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PRINT1 “? 
MAKE “INPUT COMMAND 
IF (:INPUT = “START ) THEN START STOP 
PRINT [COME OFF IT!] 
DEAD 
END 


TO COMMAND 
MAKE “INP REQUEST 
IF :INP = [] THEN PRINT1 “? OUTPUT 
COMMAND 
OUTPUT FIRST :INP 
END 


Rubbing the ring makes the genie appear: 


TO RUB :0BJ 
IF :OBJ = “RING THEN RUB.RING STOP 
PRINT [IT'S NOW MUCH CLEANER THAN IT 
WAS] 

END 


TO RUB.RING 
IF HERE! “RING THEN 
NO RING] 

END 


The genie offers tc 
invitation is decli 
at random to a rc 


TO GENIE 


NIE ELSE PRINT [I SEE 











SCEPTRE!] ELSE P 
ESCAPED WITH] [YOU 
END 


TO BLOW 
PRINT [THERE IS A MIGHTY RUSHING WIND] 
PRINT * 
MOVE1 (6+ (RANDOM 5) ) 

END 


The only thing that can be opened is the chest, and 
this contains a poisonous spider. The skull on the 
lid is a warning not to open it — but some people 
never learn! 


TO OPEN :0BJ 
IF :OBJ = “CHEST THEN OPEN.CHEST ELSE 
PRINT [YOU CAN'T OPEN IT] 

END 


LIFE]] 






EST 
POISONOUS SPIDER] [IN 





Finally, here is a list of all the nouns in the game: 


TO SWORD 
OUTPUT “SWORD 
END 


TO CHEST 
OUTPUT “CHEST 
END 


TO SCEPTRE 
OUTPUT “S 
END 


TO RING 














If you wish to 
continuing lat 
the entire conte 
Everything will 
In many ways 
programming adventu 
problem, however — t 
in present day implementations of the language. 
The game given here barely fits within the memory 
allocation for the Commodore 64. Any extensions 
beyond this are going to demand compromises 
over which words to keep and which to reject. 


| language for 
. There is one 
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BEGINNING 





In this instalment of Workshop we begin a 
new project: the construction of an 
accurately controllable floor robot with 
proximity and light sensors. In this first 
section we outline the scheme of the overall 
project and detail the mechanical 
construction of the robot body and motor 
assemblies. 





In this new project we shall be constructing and 
designing software for a floor robot vehicle. The 
robot will be powered by two stepper motors, 
driving two wheels through a gearing system. The 
stepper motors we shall be using can be controlled 
to turn through discrete steps of 7.5°. Putting the 
motor drive through a 25:2 ratio gearbox means 
that the vehicle wheels will be accurately 
controllable to an axle rotation of 0.6”. As stepper 
motors operate by turning through a discrete angle 
each time a pulse is received, they are ideally suited 
to control by a digital device. We shall be using the 
computer’s user port as our digital control source, 
allowing us to design simple software to use in 
conjunction with the robot. In addition to being 
equipped with stepper motors, the finished robot 
will have a range of sensors, including proximity 
sensors and a pair of light sensors to allow the 
robot to follow a line. As four user port data lines 
are required to control the vehicle motors, only 
four more lines are available for inputs from 
sensors. To allow maximum flexibility, the robot 
will be fitted with a ‘patching’ system. This means 
that different combinations of sensors can be 
connected to the four available data lines by 
means of a number of sockets mounted on the 
robot and the use of short patch leads. For 
example, one application may require all four 
proximity sensors, where another might require 
two proximity sensors and two light sensors. With 
the patching system the required sensors can be 
plugged directly into the relevant data input lines. 

As accurate control of the robot is possible and 
sensors are fitted, we shall also be undertaking the 
design of some sophisticated software to allow the 
creation of an internal map of the robot's 
immediate environment. We can then start to 
investigate the intricacies of route-planning and 
search strategy algorithms. In this first instalment 
we start the mechanical construction of the robot. 
This is reasonably straightforward, involving the 
drilling and cutting of the plastic box that forms 
the casing and the chassis of the robot; the 
positioning of the gear train and d-plug mounting 
holes must be accurate, but the location of the 
rocker feet is not critical. 


810 THE HOME COMPUTER ADVANCED COURSE 


PATCH SOCKETS 





Step One 


First cut the required holes in the plastic case that is 
to house and form the chassis of the completed 
robot. The diagram shows the position and 
dimensions of the holes needed. Those in the sides 
and bottom of the box are to take the protruding 
axles of the drive wheels. The mounting holes for 
the motor and gearbox block must be in line with 
one another across the box. The two holes in the 
bottom of the box are to take the two feet that 
balance the robot on its two wheels. The hole in the 
lid is for the D-type socket into which the connecting 
lead to the computer will plug. To cut the large holes 
for the gearbox and axles, remove the majority of the 
plastic with a hot knife or soldering iron. Then bring 
the hole up to size neatly with a small file 






25:2 RATIO GEAR TRAIN 


ALL MEASUREMENTS IN MILLIMETRES 








PATCH CORDS 






BALANCING FEET 





Base Of The Box 















D PLUG CONNECTOR 
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MICROSWITCH CONTACT SENSORS 


WY 


WARNING! 


Parts List 


No. item | Source 
RADIO SPARES 
2 SAA 1027 stepper motor 
drivers 300-237 
2 Stepper motors 332-947 
- 2 Synchronous gear boxes 25:2 336-450 
MAPLIN 
1 40109 QW67X 
3  16-pin DIL sockets BL19V 
2 100 ohm resistor M100R 
2 2/0o0hm0.5 watt resistor  S270R 
2 0.1uF capacitor YR75S 
1 1000 uF 25v capacitors FB83E 
1 24stripx50holeveroboard FLO/H 
1 Reel tinned 20 swg wire BL13P 
1 15-way D plug : BK58N 
1 15-way D socket ___ BKOSP 
1 15-way D cover BK60Q 
1 21 mm power socket RK37S 
1 20-way IDC socket FG87U (BBC) 
1 24-way edge connector BK74R (64) 
1 180x110 x55 mm box LFS1F 
1 Strip self adhesive pad HB22V 
2 Cabinet feet - FWS9N 
1 Pack 2BA nuts BF16S 
1 Pack 6BA0.5in bolts BFO6G 
1 Pack 6BA nuts BF18U 
1 Pack M5 25mm bolts BF32K 
1 Pack M5 nuts BF56L 
MISCELLANEOUS 
2 Lego 62mm wheels Lego 1246 
1 Pack technics axles Lego 1233 
4m 12-way ribbon cable 
1m 20-way ribbon cable (BBC) 


1 12-volt 1 amp DC supply 
2 2BA~x4cm bolts 


These parts should cost about £60 in total, which 
may make the robot more appealing as a group or 
school project than as an individual effort. The Radio 
Spares parts can be obtained directly from RS by 
account holders only; otherwise they can be ordered 
through other electronics retailers. London readers 
may like to visit the Robotics Workshop, 121 Ifield 
Road, SW10 to buy parts and for an interesting 
insight into the robotics world 







The robot consumes a large amount of power; if the 
power supply has to drive the buffer box as well then 
the robot is underpowered, and will not move. The 
robot must, therefore, be connected directly to your 
computer's user port. If you are not confident of your 
ability to follow our instructions accurately, you 
should not attempt this project since mistakes could 
conceivably cause damage to your computer 
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Step Two diagram. Leave the glue two oF three gearbox is not bolted directly to th 
case, but held on the bolt which is 























































The motors and gearbox are sold hours to dry thoroughly ich is i 
separately and must be assembled. Ste Th clamped in the case. This makes the 
Accompanying the gearbox is a loose ree gearbox, and therefore the wheel, 
small metal gear and a plastic spacer. Mount the motor (and gear) onto the adjustable. | _ 

The gear must be stuck onto the gearbox with the motor leads towards The wheels mount only onto the 
spindle protruding from the motor. the wider end of the gearbox. Two special x-sectioned Lego axles. Slip 
Apply some Cyanoacrylate (‘Super screws are provided with the gearbox 2cm length of a plastic ball-point pen 

\ue’) adhesive to the bore through the for this purpose. Be careful to meshthe case of suitable diameter over the 
ear and place it onto the motor shaft, protruding gear with the internal gears gearbox spindle as a sleeve. S | 
with the countersink, on the gear, away in the gearbox as you press the motor with some Super glue. Now glue < 
from the motor. Use the thin end of the home. Lego axle into the end of the sle V 
spacer to distance the gear correctly Use the M5 bolts to mount the Use the shortest of these ? 
from the motor body as shown in the gearbox in the plastic case. The wheels are a ‘push’ fit onto the 













Bolt the male (plug) D connector 
in place in the lid with the pins. 
| facing upwards using the 6BA 
bolts and nuts. Finally mount the 
two balancing feet, using 4 
bolt through each foot and 
fastening it inside the case with 
amt he feet should be spaced 

with the base of the feet 3cm 
from the bottom of the case. 
Spacing can be achieved by 
placing 2cm sleeves between the 
foot and the bottom of the case. 
- Alternatively, two lock nuts may 
beused 








































2cm SPACER/SLEEVE 


Acm x 2BA HEX BOLT 
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ADVENTURE GAME/PROGRAMMING PROJECTS <: 


ON LOCATION 


So far in our adventure game programming 
project, we have developed a map of the 
locations that form the basis of a game and 
written a utility routine that formats output 
to the screen. We are now in a position to 
design routines that describe locations 
within the game and allow the player to 
move between locations. 


The basic description of each location is held in the 
array LNS() (see page 767) and can be accessed 
simply by specifying the number of the location 
arrived at. In Haunted Forest, the position held by 
the player at any given time is stored in the variable 
P, and, therefore, the description of that location is 
stored in LNS(P). When the location data was first 
designed the description’s final grammatical 
context was kept in mind; the description always 
being phrased in such a way that it could be 
prefixed by “You are...’. For a given location, P, 
the description can be formatted and output to the 
utility developed in the last instalment, by 
combining “You are’ with the description held for 
that location in the array LNS(). Line 2010 in the 
Haunted Forest listing shows this. 

In addition to the basic description of the 
location arrived at, the player will also want to 
know if any objects are present. The objects used 
in the game are stored — together with their initial 
positions in the inventory — in a two-dimensional 
array, IVS(,). For example, IV$(N1) holds the 
description of the Nth object in the inventory, and 
IVS(N,2) holds its position. If we wish to determine 
whether or not there is an object at a particular 
location we must search through the inventory, 
checking each object's position against the number 
of the location that is being described. As there are 
only three objects in Haunted Forest and eight 
objects in Digitaya, a simple linear search using a 
FOR ... NEXT loop can be implemented. 

Lines 2040-2080 show the search loop used in 
Haunted Forest. The second column of the 
inventory array is scanned for a match with the 
current location, P. When a match is found, then 
the corresponding description is added to the 
sentence that describes the objects. As more than 
one object may be present in any one location, we 
must allow for the construction of a sentence 
where a list of objects is given, each separated by a 
comma. By using SPS, initially as a null string, and 
later as a comma, we can insert the correct 
punctuation between each item. A flag, F, initially 
set to zero, is set to one to signal the fact that an 
object match has been found during the search. If 
the flag remains at zero at the end of the search, 


then no objects are present, and this fact can be 
output to the player — as in line 2090 of Haunted 
Forest. 


22902 REM xxx* DESCRIBE LOCATION *xxx 
2010 SN#="YOU ARE "+LN$i<P):GOSUBSSAM 
2029 SN$="YOU SEE ” 

2030 REM ** CHECK INVENTORY FOR OBJ xx 
2040 F=0:3F+$="" 

2050 FOR I=1 TO 3 

2069 IF VALCIV$¿1,2>3<>P THEN 20809 

2079 SN$=SN$+SPS+"A "+I1V$(1,1>:F=1:S5PS$=", ' 
20820 NEXT I 

2099 IF F=0 THEN SNS$=SN$+"NO OBJECTS" 

2100 GOSUBS50@:REM FORMAT QUTFUT 

2110 RETURN 


The data containing details of the possible exits 
from each location is held in the array EXS(). Each 
string value is made up of eight digits. By 
subdividing these eight digits into groups of two, 
we obtain — working from left to right — the 


Location Detail 


INVENTORY 








A Room With A View 

The details of the locations in 
our adventure game are held in 
three string arrays, which 
contain object names and 
whereabouts (VS), location exits 
(EXS) and descriptions (LNS). 
EXS (34), for exampie, might 
contain the eight-digit number 
33390027, showing that 
location 34 connects to 
locations 33,39 and 27 by its 
north, east and west exits 
respectively. LNS(34) contains 
‘ The Middle Of Memory’, 
which describes location 34. 
IVS(2,2) contains the number 
34, showing that IVS(2,1) — The 
Key — is in location 34. Given 
the current location number the 
program assembles this 
information into a description 


DESCRIPTION 


KEVIN JONES 


THE HOME COMPUTER ADVANCED COURSE 813 





numbers of the locations lying to the north, east, 
south and west of the current location. In order to 
determine which exits are possible, the program 
first splits the eight-digit string into the four 
numbers that describe which location lies in each 
direction. 

2300 REM xxx%* DESCRIBE EXITS SYR *kxkxkx 

2310 EX$=EX$(P > 

2320 NR=VALCLEFTS(EX$,2)) 

2336 EA=VALCMIDSCEX#,3,2359 

2340 SO=VALCMID#FCEX$,5,2)) 

2359 WE=VALCRIGHTS(CEX$,2)3 

If there is no exit in a given direction, the value 
assigned is zero — and this is a great help with the 
description of the exits. A preliminary check must 
be made to see if any exits are possible before 
starting to construct the sentence “There are exits 
tothe...’. This can be done by performing a logical 
OR on all four direction variables, and this will only 
produce a zero result if all four direction variables 
are zero. If this is not the case, then the routine 
continues to test each direction variable in turn. If 
the variable is non-zero then the corresponding 
direction is added to the sentence. 


2355 IFINR OR EA OR SO OR WE>=0 THEN RETURN 
23609 PRINT? SN#="EXITS ARE TO THE ” 

2370 IF NR <>@ THEN SN#=SN$+"NORTH ” 

2389 IF EA <>@ THEN SN#=SNS+"EAST " 

2290 IF SO <> THEN SN#=SNS$+"SOUTH " 

24900 IF WE <>8 THEN SN$=SNS$+"UEST ” 

2410 GOSUB 5500:REM FORMAT 

2415 PRINT 

242A RETURN 


Now that we have developed routines that 
describe each location, we can develop procedures 
that will allow the player to do things within the 
world we have created. In a future instalment of 
the project, we shall be considering more detailed 
algorithms that analyse instructions. For now, we 
will deal with the movement instructions the 
player can issue by simply entering a one word 
direction command, such as ‘NORTH’ or 
“SOUTH”. If such an instruction is passed to a 
movement subroutine as the variable NNS, then 
the movement routine is as follows: 

3500 REM xxx*k MOVE S/R xxxkxk 


3510 MF=1:REM SET MOVE FLAG 
3520 DR$=LEFTS(NNS$, 1) 


3530 IF DR$<>"N"ANDDRS$<>"E "ANDDR$< >"S"ANDDR$< > "W" 


THEN GOTO3598 
2540 IF DR$="N"AND NR<>@ THEN P=NR:RETURN 
3550 IF DR$="E"AND EAC THEN P=EA:RETURN 
3560 IF DR$="S"AND SO<>@ THEN P=SO:RETURN 
3570 IF OR#="W"AND WE<>@ THEN P=WE:RETURN 
3580 PRINT:PRINT"YOU CAN'T "; 1S 
3585 MF=0:RETURN 
3598 REM ** NOUN NOT DIRECTION xx 
3690 PRINT"WHAT IS "¿NNS$;" 2" 
3610 MF=0:RETURN 


This routine actually uses only the first letter of the 
direction command passed to it. It begins by 
checking that the command is, in fact, a direction. 
If so, the direction specified in the command is 
acted upon. After ensuring that there is an exit in 
that direction, P — the variable that keeps track of 
the player’s position — is changed to the value of 
NR, EA, SO or WE. 

Before we can use the subroutines that we have 
developed here, however, we need to tie them all 
together to form a repeating loop. The flowchart 
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shows the logical structure of this main calling 
loop. Although this is not the final structure of the 
main program loop it serves to demonstrate the 
aspects of the program covered so far. To use the 
subroutines given here, insert the following lines, 
which form a part of the main loop. 

200 GOSUBEOOB:REM READ ARRAY DATA 

210 P=INTCRNOCTID*10:192:REM START POINT 

230 REM **** MAIN LOOP STARTS HERE dao 

240 MF=0:REM MOVE FLAG 

245 PRINT 

250 GOsSUB2000:REM DESCRIBE POSITION 


255 GOSUB2300:REM DESCRIBE EXITS 
269 PRINT: INPUT" INSTRUCTIONS”; IS$ 


Also include the following lines in the main calling 
loop: 


270 NNS=ISS:GOSUB 3500:REM MOVE 
280 GOTO 230:REM RESTART MAIN LOOP 
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SPECTRUM VARIATIONS 

Because the Spectrum holds all string arrays as 
fixed-length strings, problems arise when we wish 
to print out an element of a string array as part of a 
larger sentence. When dimensioning an array on 
the Spectrum, the last number in the statement 
defines the length of each element in the array. For 
example, DIM aS(3,2,20) dimensions a three-by- 
two element array, with each element having a 
fixed length of 20 characters. If we assign an 
element in the array to a string with less than 20 
characters, then the difference is made up by 
adding spaces to the end of the string. This wastes 
precious space in memory. Therefore, to insert 
Spectrum string-array variables into sentences, we 
must first of all remove any trailing spaces. 
Spectrum users should type in the following 
routine to do this in the Haunted Forest listing: 


7000 REM **** SPECTRUM TRUNCATE **** 
7010 FOR I=LEN(AS) TO 1 STEP -1 

7020 IF AS(I TO I)< >“ ” THEN LET N=I:LET l=1 
7030 NEXT | 

7040 LET SS=SS+AS(TO N) 

7050 RETURN 


For the Digitaya listing, type in these same 
commands, but use line numbers 8500 to 8550. 

This routine truncates AS, removing any trailing 
spaces, before adding it to S$. Remember that S$ 
is the string variable used to assemble a sentence 
for formatting. To use this routine, we must pass 
the string-array element (to be incorporated into 
the sentence) to the variable AS, and then call the 
subroutine. Therefore, we must make the 
following alterations to Spectrum versions of 
Haunted Forest and Digitaya: 


Haunted Forest: 
2010 LET SS="YOU ARE ”:AS=LS(P):GOSUB7000: 
GOSUB 5500 
2070 LET SS=SS+PS+“A ”: AS=VS(I11): 
GOSUB7000:LET F=1:LET PS="“, ” 


Digitaya: 
1450 LET SS=“YOU ARE ”:AS=LS(P): 
GOSUB8500:GOSUB5880 
1500 IF VAL(VS(I,2))=P THEN LET SS=SS+PS+“A” 
“AS=VS (11):GOSUB8500:LET F=1:LET PS=“ ” 


Basic Flavours 


Spectrum: 

Throughout both games listings, replace EXS() with 
ES(), EXS with XS, SNS with SS, ISS with TS, LNS() 
with LS(), NNS with RS, SPS with PS, DRS with DS. 
For the Digitaya listing, substitute the following 
lines: 


1580 LET NR=VAL(XS(TO 2)) 
1590 LET EA=VAL(XS(3 TO 4)) 
1600 LET SO=VAL(XS(5 TO 6)) 
1610 LET WE=VAL(XS(7 TO)) 
2020 LET DS=RS(TO 1) 


ADVENTURE GAME/PROGRAMMING PROJECTS - 





Digitaya Listing 
The structure of Digitaya is similar to Haunted 


Forest. Add the following lines to the listings given 
so far in the project: 


1100 GOSUBEOS0:REM READ ARRAY DATA 
1210 PRINT: INPUT" INSTRUCTIONS"; ISS 
1120 P=47:REM START POINT 
1130 : 

1140 REM xxx%x MAIN LOOP STARTS HERE xxook 
1130 + 

1169 MF=0:PRINT 

1170 GOSUB144@:REM DESCRIBE POSITION 
1189 GOSUB1560: REM LIST EXITS 





















Also include these lines: 


1220 NNS=ISS:GOSUB 2000:REM MOVE 
1230 GOTO 1140:REM RESTART MAIN LOOP 


Describe Location And Exits 
1499 REM xxxx DESCRIBE POSITION S/R xxxx 
19459 SN$="YOU ARE "+LNS(P):GOSUB588a 

1460 SN$="YOU SEE ” 

1478 REM xx SEARCH FOR OBJECT xx 

1480 F=a:SP$="" 

1490 FOR 1=1T08 

1509 IF VALCIV$(1,2))=P THEN SN$=SN$+SPS$+"A 
"+IVS( | 1,1>:F=1:SPS=" ” 

1510 NEXTI 

1520 IF F=0 THENSN$=SN$+"NO OBJECTS" 

1530 GOSUB5S880:REM FORMAT 
15409 RETURN 

1559 : 

1560 REM *x«x* LIST EXITS S/R 
1570 EXS$=EX$(P) 

1580 NR=VAL(LEFTS(EX$,2)) 
1590 EA=VAL(MIDS(EX$,3,2)) 
1600 SO=VAL(MIDS(EX#,5,2)> 
1610 WE=VALC(RIGHT#(EX#,2)> 
1620 IF CNR OR EA OR SO OR WE)=@THEN RETURN 
1630 PRINT:SN$="EXITS ARE TO THE " 

1640 IF NR<>@ THEN SN#=SN$+"NORTH " 

1659 IF EAC>@ THEN SN$=SN$+"EAST " 

1669 IF SO<>@ THEN SN#=SN$+"SOUTH " 

167@ IF WE<>@ THEN SN®=SN#+"KEST " 

1675 GOSUB 5830:REM FORMAT 

1680 PRINT:RETURN 




















KxKK 



















Move To Subroutine 


2000 REM *k*x*x MOVE S/R xed 

2010 M*F=1:REM MOVE FLAG SET 

2020 DR$= LEFTS(NNS, 1) 

20309 IFDR$<>"N"ANDDR$< >"E "ANDDRS< > "S "ANDDR$< > 
"4" TH: EN2 100 

2049 IF DR$="N" AND NR<>0 THEN P=NR:RETURN 
2050 IF DR$="S" AND SO<>0 THEN P=SO:RETURN 
2069 IF DR$="E" AND EA<>Ø THEN P=EA:RETURN 
2079 IF DR$="W" AND WE<>0 THEN P=uE : RETURN 
2839 PRINT"YOU CANT ";IS$ 

2090 MF=0:RETURN 

2100 REM NOUN NOT OK 

21109 PRINT"URAT IS "INHE:* ?* 

2120 MF=0:RETURN 














For the Haunted Forest listing, substitute the 
following lines: 


210 RANDOMISE:P=INT(RND(1)*10+1) 
2320 LET NR=VAL(XS(TO 2)) 

2330 LET EA=VAL(XS(3 TO 4)) 

2340 LET SO=VAL(XS(5 TO 6)) 


2350 LET WE=VAL(XS(7 TO)) 
3520 LET DS=RS(TO 1) 


BBC Micro: 
Substitute the following line in the Haunted Forest 
listing: 


210 P=RND(10) 
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Index Linked 

The index file consists of the key 
fields of the data records, sorted 
in the same order as the main 
file. A record is located by 
searching the index file for the 
key and then skipping the 
appropriate number of records 
in the main file. Records are 
deleted temporarily by marking 
them in the index file; from time 
to time the main file willl be re- 
sorted to take account of 
changes, and the deleted 
records will then be permanently 
removed 


INDEX 


` The word index has several different definitions in 


computing. The first refers to a number or item of 
data in a list that indicates where a piece of 
information can be located. For example, a BASIC 
array contains a number of different elements, and 
each of these can be separately accessed by 
selecting a number associated with that element. 
This number is referred to as ‘the index’. In 
machine code, an index is a number held in an 
index register. This index is the number that must 
be added to a particular address, which then points 
to another address — the contents of which are to 
be modified. This method of addressing is used for 
processing arrays. 


INDEXED FILE 


As its name implies, an indexed fileis simply a file 
whose organisation is dependent on an index. 
Indexed files may be organised so that the index is 
separated from the file itself — as in a book index. 
In computing, this type of indexed file may be 
found on a floppy disk, on which a specific track is 
set aside for the directory of the disk’s contents. 
Each time the disk is accessed the directory is 
examined to discover the required file's location. 
A common and important file type is the 
indexed sequential file. Here, a sequential file is 
stored in sorted order, and an index file is created 
from it, consisting of the sort key field from each 
record of the original file, in the sorted order. 
Records are located by searching the index file for 
the desired key field; its position in the index is the 
same as the parent record's position in the 
sequential file. This can now be accessed 
reasonably quickly by skipping the appropriate 
number of records from the start of the file. The 
technique was first developed for mainframe tape- 
based systems in which the whole index file could 
usually be held and searched quickly in memory; 
the parent file would generally contain too many 
lengthy records to fit into available memory. 


Main File 
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INDEX REGISTER 


An index register is an area set aside within the 
central processing unit (CPU) of a microcomputer 
for the storage of the index currently being used by 
the program. This is particularly useful for 
‘indexed addressing’. In this method of addressing, 
the number held in the index register is added to 
the address specified in the instruction, and the 
sum of the two numbers is the address to be 
accessed by the computer. For example, the 
instruction LDA BASE,X will LoaD the Accumulator 
with the contents of the address whose value is 
equal to BASE + the contents of register X. 

This technique is mostly used to access a table of 
numbers (an array). A number of instructions, or 
op-codes, are set aside specifically to manipulate 
the numbers held within index registers. An index 
register may also be used as a general-purpose 
register. This means that the register can be used 
by the programmer as a short-term storage device 
for numbers. Used in this way, an index register 
can cut both memory use and processing time 
appreciably. The alternative is to have the 
processor store the number in RAM — a 
process that is time-consuming and occupies 
valuable memory space. 


INFORMATION HIDING 


Information hiding is a concept relating to 
structured programming. The principle behind 


this method of programming is that a program 


should be constructed of individual modules that 
are self-contained, and which can easily be 
understood and modified. Furthermore, the 
information and decisions taken within a module 
should, as far as possible, be exclusive to that 
module. This is known as ‘information hiding’ 
because the information or decision is ‘hidden’ 
from the rest of the program. This concept was first 
developed by David Parnas, who proposed that all 
modules within a program should ideally contain 
only one decision. 


INFORMATION MANAGEMENT 
SYSTEM 


An information management system is designed 
to deal with the organisation of information within 
a system. It is often used with databases, which are 
themselves ways of organising data. The 
information must be stored in such a way as to 
allow fast and easy access by the user. This means 
that the system must not only be able to store the 
information but must also maintain an index 
system to allow that information to be retrieved 
efficiently. However, an information management 
system is more than simply the location, storage, 
retrieval and cataloguing of data. Although 
databases are within the field of IMS, the term is 
more broadly based, encompassing such features 
as the computer’s operating system and memory 
management, as well as other programs in which 
data is constantly being changed and updated. 
IMS, combined with distributed processing, is the 
most important influence on data processing. 





LAST ORDERS 





There are three commands for our 
debugging program that are yet to be 
designed. Before we look at these, however, 
we will consider the interrupt mechanism 
used to transfer control between the 
debugging program and the program being 
debugged at the breakpoints. We will also 
design the initialisation procedure. 





The interrupt mechanism is used at breakpoints in 
the original program, where we have replaced an 
instruction with an SWI (SoftWare Interrupt) op- 
code. The SWI, like the other interrupts on the 
6809, is vectored through a specific memory 
location — namely, SFFFA. This means that when 
an SWI is executed the registers are saved on the 
stack and the processor loads the 16-bit address at 
SFFFA and SFFFB into the program counter (PC). 
Execution then continues from that address. Our 
task is to change this vector so that it points to the 
entry point of our debugger program. One 
problem here is that interrupt vectors are almost 
always held in ROM. The fact that these addresses 
are fixed, therefore, means that the operating 
system must have some other means of vectoring 
interrupts. 

The normal system is to have a jump table (see 
page 639) held in an area of ‘scratchpad’ RAM, 
which is memory that is not normally available to 
programs but is reserved for use by the operating 
system. The address pointed at by the vector 
contains a JMP instruction followed by an address, 
which normally will point back into the operating 
system. However, we can change this address to 
the one we want so the first instruction executed 
after the software interrupt will be a JMP to the 
entry address of the debugger. We must be careful 
to replace the original contents of the jump table 
before our program finishes executing, because it 
is always possible that the operating system will 
execute an SWI subsequently. It is worth 
remembering that the 6809 has three software 
interrupts, and there is no reason why either SWI2 
(op-code 10 3F and vector at SFFF4) or SWI3 (op- 
code 11 3F and vector at SFFF2) should not be used 
— although the fact that these use two-byte op- 
codes makes some changes necessary in the 
debugger program. 

A further problem is that our program can only 
occupy whatever memory is left free by the 
program we are debugging. The debugger must 
therefore be relocatable. You will have noticed 
that all references to memory locations in the 
program have been (or should have been) made 
using program counter relative addressing. The 


problem is that at some point we must know the 
absolute address of the program entry point so that 
we can place it in the interrupt jump table. This 
address must be calculated at run-time, since the 
assembler cannot deal with it. 

Our first task then is calculating this address and 
inserting it into the jump table. Note that the entry 
point address for SWI will be different from the 
start address of the debugger program, because 
the routine at the program start address must 
handle this initialisation procedure, which will not 
be needed when we re-enter the program via SWI. 
Accordingly, we will handle all the initialisation 
within a subroutine; the entry point will then be 
the address containing the instruction after the 
BSR call to this subroutine. Very conveniently, this 
address is precisely the one saved on the stack by 
the BSR call so we can read it from the stack in 
order to place it at the appropriate point in the 
jump table. 

The other job of this initialisation procedure is 
to obtain the start address of the program to be 
debugged. Here is the completed design: 


INITIALISATION PROCEDURE 
Data: 
Vector-Address is the address to be found at 

SFFFA in X 

JMP-Opcode is the op-code for the JMP 

instruction in A 

Entry-Address is the address of the entry point in Y 

Start-Address of the program to be debugged in D 
Process: 

Get Vector-Address 

Store JMP-Opcode at Vector-Address 

Get Entry-Address 

Store it at (Vector-Address +1) - 

Get Start-Address from keyboard 

Save it 


We can now return and complete the coding of the 
three remaining commands. A further point to 
consider involves one of these commands — 
namely command R, which displays the contents 
of the registers. We do not, of course, want to 
display the current contents of the registers while 
the debugger is running; instead, we want to look 
at the contents of the registers as they were when - 
the breakpoint occurred. This means that we want 
to look at the values that were placed on the stack 
by the SWI instruction. However, there will be 
other values placed on top of these on the stack by 
the time we want to get at them. We could 
probably calculate the number of unwanted bytes 
on the stack and obtain the register values by 
discarding this amount. But a simpler solution is to 
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A Stack In Time 

The debugger program begins 
with a BSR call to the 
initialisation routine, followed by 
the start of the main program 
loop. One of the initialisation 
tasks is to ascertain the absolute 
address of this loop start, and to 
copy it into the interrupt jump 
table so that when an SWI is 
executed control will pass 
through the jump table and back 
to the loop start. This address 
cannot be known in advance 
because the program must be 
fully relocatable; fortunately, the 
return address stacked by the 
BSR is precisely the address in 
question, so the initialisation 
routine needs merely to copy it 
from the stack to the jump table 








save the value of the stack pointer as the first 
operation after the interrupt occurs, so that it can 
be used as a reference. 

In coding the R command, we will assume that 
this has been done, so that we can retrieve these 
register contents. The structure of the routine is 
perfectly straightforward — we simply take each 
value in turn without actually pulling them off the 
stack and display them with appropriate labels. 
The only exception will be the value of S — this 
should be the value prior to the interrupt and can 
be obtained by adding the appropriate amount to 
the saved value of S that we use to reference the 
stacked register values. 


COMMAND R 

Data: 
Stack-Pointer is the value of the top of stack after 
interrupt in X 
Single-Byte-Value holds the values of single-byte 
registers in B 
Two-Byte-Value holds the values of 16-bit 
registers in D 
Labels holds the labels for the nine registers 


Get Stack-Pointer 

Load CC into Single-Byte-Value 

Display label(1), Single-Byte-Value 
Repeat the above for A, B, and DP 

Load X into Two-Byte-Value 

Display label(5), Two-Byte-Value 
Repeat the above for Y, U and PC 

Add 12 to original value of Stack-Pointer 
Display label(9), Stack-Pointer 


- There are two remaining commands: Q, to quit the 


program, does not need a special routine of its 
own; and G, to resume program execution after a 


Addressing The Problem 
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PROGRAM MEMORY 


| GET START ADDRESS — | 
STORE START ADDRESS | 
PIS. l 
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breakpoint. At this point we have to replace the 
SWI instruction that caused the break with the 
original instruction that it replaced and then pass 
control back to that instruction. We can restore the 
registers to their original contents easily enough, 
simply by using an RTI, which unstacks them all. 
We must, however, be careful that the value of the 
PC that is unstacked is going to be the value for the 
next instruction; since this is one greater than the 
value we require, we must adjust the value on the 

stack before we return. | 


COMMAND G 

Data: 
Breakpoint-Table is a table of 16-bit addresses of 
breakpoints 
Removed-Values is a table of op-codes replaced 
with SWIs 
Next-Breakpoint is ¿ number in the range 1 to 16 
Stack-Pointer is the saved value of the stack 
pointer after the SWI 


Process: 


If Next-Breakpoint >0 and <=16 then 
Get op-code from Removed-Values (Next- 
Breakpoint) 
Store it at address in Breakpoint-Table (Next- 
Breakpoint) 
Set S to Stack-Pointer 
Decrement value of PC on stack 
Increment Next-Breakpoint 
Return from interrupt 

else 
Return from subroutine 


Our 6809 machine code series concludes in the 
next instalment, when we code the main module 
of our debugger, and look at the operation of the 
program as a whole. 
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initialisation Procedure 


START RMB 2 To save the start address 
OPJMP FCB SOE JMP-opcode 
INIT LDX SFFFA Get Vector-Address 
LDA OPJMP, PCR Get JMP-opcode and 
STA , X+ save it at Vector-Address 
LDY 15 Get Entry-Address from the stack 
Sly X Save it at Vector-Address + 1 
BSR GETADD Get Start-Address from keyboard 
STD START,PCR Save it 
RTS Return 
Command R 
STACKP RMB 2 Stack-Pointer 
LABELS FCC ‘CCABDP XY 
UPC S’ 
SPACE FCB 3? ASCII code for space 
CMDR PSHS ABAY Save used registers 


LDX STACKP, PCR Get Stack-Pointer 
LEAY LABELS, PCR Use Y to point to label 


LDA #4 Number of single byte registers 
FORO1 BSR CMDR1 Display next register 

DECA four times 

BGT FORO1 

LDA #4 Number of two byte registers 
FORO2 BSR CMDR2 Display next register 

DECA four times 

BGT FORO2 

LDA „Y+ First character of label 

BSR OUTCH Display it 

LDA „Y+ Second character of label 

BSR OUTCH Display it 

LDA SPACE,PCR Display space 

BSR OUTCH 

TFR X,D X now contains the required 

value of S 
BSR DSPADD Display S 


PULS ABXYPC Restore and return 


* Subroutine to display a single byte register 


CMDR1 PSAS A Save A 
LDA „Y+ First character of label 
BSR OUTCH Display it 
LDA „Y+ Second character of label 
BSR OUTCH Display it 
LDA SPACE,PCR Display space 
BSR OUTCH 
LDB „X+ Get next register into Single-Byte 
-Value 
BSR DSPVAL Display Single-Byte-Value 
PUIS APC Restore A and return 
* Subroutine to display a two byte register 
CMDR2 PSHS A Save A 
LDA + First character of label 
BSR OUTCH Display it 
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LDA Y + Second character of label 
BSR OUTCH Display it 
LDA SPACE,P-CR Display space 
BSR OUTCH 
LDD Att Get next register into Two-Byte 
-Value 
BSR DSPADD Display Two-Byte-Value 
PUSS APC Restore A and return 
Command G 
BPTAB RMB o2 Breakpoint-Table 
REMTAB RMB 16 Removed-Values 
NEXTBP RMB 1 Next-Breakpoint 
CMDG PSHS A Save A in case we do a normal return 
LDA NEXTBP,PCR  Next-Breakpoint 
IFO4 BLE ENDF04 If Next-Breakpoint >0 
CMPA MAXBP,PCR  and<-=16 
BGT ENDFO4 (maximum number of 
breakpoints) 
DECA Convert to offset into table 
LEAX  BPTAB,PCR Address of Breakpoint- Table 
LEAY REMTAB,PCR Address of Removed- Values 
LDB AY Get Removed-Value 
LSLA Convert A to offset for 16-bit table 
STB [A,X] Store it at address in Breakpoint- 
Table 
LDS STACKP,PCR Get Stack-Pointer into S 
DEC 10,5 Adjust value of PC on stack 
INC NEXTBP,PCR Increment Next-Breakpoint 
RTI Return from interrupt 
ENOFOJ PUIS APC Restore and return 
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STARS ON SCREEN 


NN 


The BBC Micro i is s the machine used i in the 
majority of British schools, and it is 
therefore hardly surprising that a large 
amount of ‘educational’ software has been 
- developed for it. Here we look at one such 
package — Starfinder, a program that is 
designed for amateur astronomers. 


usenet PIES nas SSA 


Astronomers, especially the British ene hae 
always faced one problem in particular — that of 
the weather. It is not uncommon for professional 
astronomers to spend weeks preparing for a 
particularly stunning event, only to discover that 
dense cloud has obscured the view. This is the 
reason that most observatories are now built at 
high altitude, in places where there is little cloud, 
or even in space. 

Century Software has now brought the universe 
to the small screen with Starfinder, a package 
containing cassette software and a book. In 
essence, the Starfinder program allows the user to 


Starlight, Starbright 

_ Starfinder’s two display modes 
give a rectangular or circular 
skyscape depending upon 
whether the line of sight is 
horizontal or vertical. The star 
scene can be adjusted for a 
point of view anywhere on the 
Earth’s surface at any time in the 
20th century. Particular stars or 
planets can be searched for 

in the display, aS can 
Halley’s Comet 


Horizontal View 


view any section of the sky in any part of the world 
at any time in the 20th century. 

Once the program has loaded from cassette, the 
user is given a list of options. One of these is to 
view the current sky; the default view is of the sky 
as seen when looking south from London at 
midnight (Greenwich Mean Time) on 21 
November 1984. This seems to be purely arbitrary, 
as there is nothing special about the view of the sky 
on this date: it’s likely that this was designed to 
coincide with the package’s launch date rather 
than with a specific cosmic event. 

At the top of the screen, the program displays 
the time and date, and gives the observer's location 
in longitude and latitude. Below this information 


Vertical View 


820 THE HOME COMPUTER ADVANCED COURSE 














is the star chart itself, which shows the night sky 
from the south-west to the south-east, assuming 
an altitude (the angle of view) of 60°. The program 
takes a few seconds to display the stars themselves, 
as a large amount of number-crunching is required 
to process and then plot each of the stars. 

The stars are shown as white squares (the 
program runs in mode 4), and brighter stars are 
depicted as being larger. It is a pity that the Acorn 
machines do not have a ‘brightness’ command, 
which would make the display more realistic. 
Planets are also square-shaped, but are plotted in 
red, while the sun is represented by a large yellow 
square and the moon by a small yellow point. By 
using the ‘space probe’, which is moved by using | 
the cursor keys, it is possible to identify any of the 
stars shown. When the space probe (a red cross) is 
positioned over a star, that star’s technical 
designation and popular name are shown above 
the map, together with its co-ordinates, given as an 
altitude and an azimuth figure (the altitude is 
expressed as a positive or negative figure, with the 
horizon as zero; while the azimuth shows the 
number of degrees east or west of due north). The 
view may be changed from the keyboard by 
altering either of these figures. 

By returning to the main menu, the user may 
change the view to correspond to that revealed at 
any time, anywhere in the world. It is also possible 
to use the program to find a particular heavenly 
body: a star, a planet or Halley’s Comet. 

Although this package is comprehensive, it 
does have limitations. The primary restriction is 
on the number of stars that may be displayed. The 
programmer, Robert Alpiar, has chosen to include 
stars of a magnitude of 4 or lower (‘magnitude’ 
refers to a star’s brightness, with a high magnitude 
representing a faint star). The naked eye is capable 
of discerning stars of magnitude 6, so the program 
does not claim to show as many stars as a person 
might see on a clear night. | 

The book that is included with the program 
explains the use of Starfinder, but also includes 
other tips for amateur astronomers, including 
advice on different types of telescope and the best 
times to view planets and stars. 


Starfinder: For the BBC Micro and the Electron 
£12.95. 

Publishers: Century Software, Portland House, 12-13 
Greek Street, London, W1V 5LE. 


Authors: Book by Heather Couper, program by 
Ronald Alpiar. 

Joysticks: Not Required. 

Format: Cassette. 








Note: Certain flags have more than one purpose. 
Refer to the 280 CPU Technical Manual for details. 


eeen 
Restart Group 


Symbolic 
Operation 


(SP — 1) — PCy 
(SP - 2) — PCL 
PC — nn 


if condition 

cc is false 
continue, 
otherwise same as 
CALL nn 


PC, — (SP) 
PCy — (SP +1) 


If condition 
cc is false 
continue, 
otherwise 
same as 
RET 


Return from 
interrupt 
Return from 
non-maskabie 
interrupt 


(SP- 1) — PCH 
(SP —2) — PC, 
PCy — 0 
PCL =p 


'RETN loads IFF> — IFF; 


* = flag not affected, O = fiag reset. 1 = flag set, X 
} = flag is affected according to the result of the operation 


SEASSA EAEAN AEAEE AAEE 





CONDITION 


C 


Call and Return Group 





Opcode 
76 543 210 


11 001 


11 001 001 


1f cc 000 


11 101 
01 001 
11 101 
01 000 


flag is unknown 


‘RST 0’ 
‘RST & 
‘RST 16’ 
‘RST 24’ 
‘RST 32’ 
‘RST 40’ 
‘RST 48’ 
‘RST 56’ 

No.of No.of M No.of T 
Hex Bytes Cycles States 


CD 


C9 


ED 
4D 
ED 
45 


DATABASE 


Here, courtesy of Zilog Inc., we publish the final part of the Z80 programmers’ reference card. 
Call and Return Groups and Restart 








Comments 





17 


11 


14 


11 


If cc is false 


if ce is true 


It cc is false 


if cc is true 


cc Condition 


000 NZ non-zero 
001 Z zero 
010 NC non-carry 
011 C carry 
100 PO parity odd 
101 PE parity even 


110 P sign positive 
111 M sign negative 


t p 


000 00H 


001 08H 
010 10H 
011 18H 
100 20H 
101 28H 
110 30H 
111. 38H 


























